sink("MalePoet_ID_TTest.txt")
t.test(WPM ~ ID, data = poets)
t.test(dynamism ~ ID, data = poets) 
t.test(speaking_rate ~ ID, data = poets)
t.test(complexityAllPauses ~ ID, data = poets)
t.test(complexitySyllables ~ ID, data = poets)
t.test(complexityPhrases ~ ID, data = poets)
t.test(pausecount ~ ID, data = poets)
t.test(pauserate ~ ID, data = poets)
t.test(pausemean100 ~ ID, data = poets)
t.test(f0mean ~ ID, data = poets)
t.test(f0range ~ ID, data = poets)
t.test(f0speed ~ ID, data = poets)
t.test(f0contour ~ ID, data = poets)
sink()
